Workplace Effectiveness:…ecision-Making Strategies/Workplace Effectiveness: Decision-Making Strategies.iso/pc/Files/Whowhat.dxr/00003_Navigation handlers.ls

Text File | 1998-12-16 | 820 b | 39 lines

global gMasterData, gSection, gSpLocList, gSpNameList

on goIntro
  go(label("intro"))
  set gSection to #intro
  goNarrator(gMasterData, "145")
end

on go1
  go(label("1"))
  set gSection to 1
  goNarrator(gMasterData, "147")
end

on go2
  go(label("2"))
  set gSection to 2
  if not activationOn(gMasterData) then
    activate(gMasterData)
  end if
end

on storeSpLocs
  set gSpLocList to []
  set gSpNameList to []
  repeat with i = 5 to 39
    set spLoc to the loc of sprite i
    set spName to the name of member the member of sprite i
    append(gSpLocList, spLoc)
    append(gSpNameList, spName)
  end repeat
  repeat with i = 46 to 108
    set spLoc to the loc of sprite i
    set spName to the name of member the member of sprite i
    append(gSpLocList, spLoc)
    append(gSpNameList, spName)
  end repeat
end